home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PadHop.dxr / Internal_2_add to gFloats and setup level.ls < prev    next >
Encoding:
Text File  |  2002-01-31  |  2.2 KB  |  81 lines
  1. property pSprite, spriteNum, pGo
  2. global gFloats, gFrog, gCurrentFloat, gInMotion
  3.  
  4. on beginSprite me
  5.   pGo = 0
  6.   pSprite = sprite(spriteNum)
  7.   gFloats.add(pSprite)
  8.   if gFloats.count = 19 then
  9.     gFloats[1].loc = point(290, 400)
  10.     gFloats[2].loc = point(250, 250)
  11.     gFloats[2].pSpeed = -1
  12.     gFloats[3].loc = point(440, 100)
  13.     gFloats[4].loc = point(440, -50)
  14.     gFloats[4].pIn = 1
  15.     gFloats[4].pFreq = 150
  16.     gFloats[5].loc = point(100, -200)
  17.     gFloats[5].flipH = 1
  18.     gFloats[5].pSpeed = 2
  19.     gFloats[6].loc = point(205, -350)
  20.     gFloats[6].pFla = 1
  21.     gFloats[6].pLoc = gFloats[6].locH
  22.     gFloats[6].pdir = 2
  23.     gFloats[7].loc = point(421, -500)
  24.     gFloats[7].flipH = 1
  25.     gFloats[7].pSpeed = 3
  26.     gFloats[8].loc = point(143, -650)
  27.     gFloats[8].pSpeed = -1
  28.     gFloats[9].loc = point(333, -800)
  29.     gFloats[9].flipH = 1
  30.     gFloats[9].pSpeed = 4
  31.     gFloats[10].loc = point(90, -950)
  32.     gFloats[10].pFla = 1
  33.     gFloats[10].pLoc = gFloats[10].locH
  34.     gFloats[10].pdir = 3
  35.     gFloats[11].loc = point(167, -1100)
  36.     gFloats[11].pSpeed = -2
  37.     gFloats[12].loc = point(422, -1250)
  38.     gFloats[12].pIn = 1
  39.     gFloats[12].pFreq = 100
  40.     gFloats[13].loc = point(89, -1400)
  41.     gFloats[13].flipH = 1
  42.     gFloats[13].pSpeed = 3
  43.     gFloats[14].loc = point(380, -1550)
  44.     gFloats[14].pSpeed = -2
  45.     gFloats[15].loc = point(210, -1700)
  46.     gFloats[15].pSpeed = -5
  47.     gFloats[16].loc = point(447, -1850)
  48.     gFloats[16].flipH = 1
  49.     gFloats[16].pSpeed = 4
  50.     gFloats[17].loc = point(100, -2000)
  51.     gFloats[17].pFla = 1
  52.     gFloats[17].pLoc = gFloats[17].locH
  53.     gFloats[17].pdir = 3
  54.     gFloats[12].pIn = 1
  55.     gFloats[12].pFreq = 100
  56.     gFloats[18].loc = point(399, -2150)
  57.     gFloats[18].flipH = 1
  58.     gFloats[18].pSpeed = 6
  59.     gFloats[19].loc = point(290, -2300)
  60.     gFloats[19].pIn = 1
  61.     gFloats[19].pFreq = 30
  62.     gCurrentFloat = gFloats[1]
  63.   end if
  64. end
  65.  
  66. on enterFrame me
  67.   if pGo then
  68.     if pSprite = gCurrentFloat then
  69.       if pSprite.locV >= 400 then
  70.         repeat with i in gFloats
  71.           i.pGo = 0
  72.         end repeat
  73.         gInMotion = 0
  74.       end if
  75.     end if
  76.     gFrog.locV = gCurrentFloat.locV
  77.     gFrog.pLocV = gFrog.locV
  78.     pSprite.locV = pSprite.locV + 5
  79.   end if
  80. end
  81.